home *** CD-ROM | disk | FTP | other *** search
/ Linux Cubed Series 7: Sunsite / Linux Cubed Series 7 - Sunsite Vol 1.iso / system / shells / scsh-0.4 / scsh-0 / scsh-0.4.2 / scsh / hpux / packages.scm < prev    next >
Text File  |  1995-10-13  |  2KB  |  65 lines

  1. ;;; Interfaces and packages for the HP-UX specific parts of scsh.
  2. ;;; Copyright (c) 1994 by Olin Shivers.
  3.  
  4. (define-interface hpux-fdflags-extras-interface
  5.   (export open/sync))
  6.  
  7. (define-interface hpux-errno-extras-interface
  8.   (export errno/wouldblock))
  9.  
  10. (define-interface hpux-signals-extras-interface
  11.   (export))
  12.  
  13. (define-interface hpux-network-extras-interface
  14.   (export socket/debug
  15.       socket/accept-connect
  16.       socket/reuse-address
  17.       socket/keep-alive
  18.       socket/dont-route
  19.       socket/broadcast
  20.       socket/use-loop-back
  21.       socket/linger
  22.       socket/oob-inline
  23. ;      socket/use-privileged
  24. ;      socket/cant-signal
  25.       socket/send-buffer
  26.       socket/receive-buffer
  27.       socket/send-low-water
  28.       socket/receive-low-water
  29.       socket/send-timeout
  30.       socket/receive-timeout
  31.       socket/error
  32.       socket/type
  33.       socket/send-avoid-copy    ;hpux
  34.       socket/receive-avoid-copy    ;hpux
  35.       ;; all options except ip/options & ip/time-to-live hpux specific
  36.       ip/options
  37.       ip/multicast-if    
  38.       ip/multicast-ttl    
  39.       ip/multicast-loop    
  40.       ip/add-membership    
  41.       ip/drop-membership    
  42.       ip/time-to-live 
  43.       tcp/no-delay
  44.       tcp/max-segment))
  45.  
  46. (define-interface hpux-extras-interface
  47.   (compound-interface hpux-errno-extras-interface
  48.               hpux-fdflags-extras-interface
  49.               hpux-network-extras-interface
  50.               hpux-signals-extras-interface))
  51.  
  52. (define-interface hpux-defs-interface
  53.   (compound-interface hpux-extras-interface
  54.               sockets-network-interface
  55.               posix-errno-interface
  56.               posix-fdflags-interface
  57.               posix-signals-interface))
  58.  
  59. (define-structure hpux-defs hpux-defs-interface
  60.   (open scheme bitwise defenum-package)
  61.   (files fdflags errno signals netconst))
  62.  
  63. (define-interface os-extras-interface hpux-extras-interface)
  64. (define os-dependent hpux-defs)
  65.